Code refactoring in Delphi

join shbcf.ru